From 442c9ab62723c834867a2402e2c84af9bb2003dc Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 10 Jun 1993 18:46:48 +0000 Subject: [PATCH] (ange-ftp-multi-msgs): Add 331-. --- lisp/ange-ftp.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el index c895ce9fa26..f359cbe8d7c 100644 --- a/lisp/ange-ftp.el +++ b/lisp/ange-ftp.el @@ -630,7 +630,7 @@ parenthesized expressions in REGEXP for the components (in that order).") ;; Otherwise, ange-ftp will go into multi-skip mode, and never come out. (defvar ange-ftp-multi-msgs - "^220-\\|^230-\\|^226\\|^25.-\\|^221-\\|^200-\\|^530-\\|^4[25]1-" + "^220-\\|^230-\\|^226\\|^25.-\\|^221-\\|^200-\\|^331-\\|^4[25]1-\\|^530-" "*Regular expression matching messages from the ftp process that start a multiline reply.") @@ -856,7 +856,7 @@ SIZE, if supplied, should be a prime number." ;;;; Internal variables. ;;;; ------------------------------------------------------------ -(defconst ange-ftp-version "$Revision: 1.25 $") +(defconst ange-ftp-version "$Revision: 1.26 $") (defvar ange-ftp-data-buffer-name " *ftp data*" "Buffer name to hold directory listing data received from ftp process.") -- 2.30.2